===========================================
Energy Refill Tile for 3k
===========================================

Function main(player as long) as long
If Hasobj(player, 6) =>3000 then
        Takeobj(player, 6, 3000)
        Setplayerenergy(player, 255)
        Runscript0("PushBack")
main = continue
        else
        RunScript0("PushBack")
        playermessage(player, "You need 3,000 gold coins to restore your energy", BrightGreen)
main = stop
End if
end function